(init_lread): Specify LC_NUMERIC locale.

diff --git a/src/lread.c b/src/lread.c
index 4c44949d5b1d90dfea3c7e4dc7513d5f0de68060..4f0b5f62548c3b4bd8adc338307cd8210e140fae 100644 (file)
--- a/src/lread.c
+++ b/src/lread.c
@@ -2233,6 +2233,11 @@ init_lread ()
   char *normal;
   int turn_off_warning = 0;
 
+#ifdef HAVE_SETLOCALE
+  /* Make sure numbers are parsed as we expect.  */
+  setlocale (LC_NUMERIC, "C");
+#endif /* HAVE_SETLOCALE */
+
   /* Compute the default load-path.  */
 #ifdef CANNOT_DUMP
   normal = PATH_LOADSEARCH;